

/*
REPLICATION CODE for Study #2 in:
"Commanding Support: Values and Interests in the Rhetoric of Alliance Politics"
published in International Interactions

Authors: Jonathan Chu, Jiyoung Ko, and Adam Liu
Contact: jonchu@stanford.edu
*/



cd "[INSERT FILE PATH HERE]"
use Replication_Study2_DataFile.dta




*********************************Figure 2

reg dv_keep200 i.treat, r // note that dv_keep200 is simply dv_keep2 mutliplied by 100 so that the scale can be interpreted out of 100 percentage points.
estimates store a

coefplot ///
(a, msymbol(square) msize(vlarge) mfcolor("2 105 168") color("2 105 168") level(90) ciopts(color("2 105 168") recast(rcap) )  ) ///
, ///
drop (_cons) ///
xscale(noextend) ///
title("Rhetoric Effect in Percentage Points", size(medlarge) margin(medium) color(black) pos(6) ) ///
xlab (-20(5)20 ) ///
xline (0, lcolor(gray) lp(dash)) ///
ylab( 1 `" "No Values," "No Interests" "' 2 `" "Values," "No Interests" "' 3 `" "No Values," "Interests" "' 4 `" "Values," "Interests" "' , ///
labsize(medlarge) tlcolor(white) nogrid ) ///
yscale (lcolor(white)  ) ///
graphregion(fcolor(white) lcolor(white) ) bgcolor(white) ///
legend ( off) xsize(20) ysize(20) ///
name(keep200_main, replace)



*****************************Figure 3

reg dv_crisis200 i.treat, r
estimates store a

coefplot ///
(a, msymbol(square) msize(vlarge) mfcolor("2 105 168") color("2 105 168") level(90) ciopts(color("2 105 168") recast(rcap) )  ) ///
, ///
drop (_cons) ///
xscale(noextend) ///
title("Rhetoric Effect in Percentage Points", size(medlarge) margin(medium) color(black) pos(6) ) ///
xlab (-20(5)20 ) ///
xline (0, lcolor(gray) lp(dash)) ///
ylab( 1 `" "No Values," "No Interests" "' 2 `" "Values," "No Interests" "' 3 `" "No Values," "Interests" "' 4 `" "Values," "Interests" "' , ///
labsize(medlarge) tlcolor(white) nogrid ) ///
yscale (lcolor(white)  ) ///
graphregion(fcolor(white) lcolor(white) ) bgcolor(white) ///
legend ( off) xsize(20) ysize(20) ///
name(crisis200_main, replace)


*************************Appendix Table A2

summ dv_keep2
summ dv_crisis2
summ ideo7
summ female
summ age
summ white
summ college
summ dem2
summ rep2



***** Appendix Robustness Checks with 7-point scale DV

ranksum dv_keep7 if treat==0|treat==1, by(treat)
ranksum dv_keep7 if treat==0|treat==2, by(treat)
ranksum dv_keep7 if treat==0|treat==3, by(treat)
ranksum dv_keep7 if treat==0|treat==4, by(treat)



ranksum dv_crisis7 if treat==0|treat==1, by(treat)
ranksum dv_crisis7 if treat==0|treat==2, by(treat)
ranksum dv_crisis7 if treat==0|treat==3, by(treat)
ranksum dv_crisis7 if treat==0|treat==4, by(treat)




